home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Kit PC World De Ampliacion De Windows 95
/
Kit PC World de ampliacion de Windows 95.iso
/
lotus
/
lotus032.dsk
/
LWPDBASW.SMM
< prev
next >
Wrap
INI File
|
1995-05-18
|
9KB
|
1,137 lines
[ver]
4
[sty]
_default.sty
[charset]
82
ANSI (Windows, IBM CP 1252)
[PanoseFontTable]
9
5
TimesNewRomanPS
257
257
257
257
257
Arial MT
257
257
257
257
257
Arial
2818
1030
514
514
1026
Helv
2818
1029
514
770
1026
Helvetica
2818
1029
514
514
1026
LotusWP Type
257
257
257
257
257
257
257
257
257
257
Times New Roman
514
774
1029
517
1027
MS Sans Serif
2818
1030
514
514
1026
[recfile]
1
1
3
12
1440
1440
[revisions]
0
[prn]
HP DeskJet 500
[port]
LPT1:
[lnopts]
2
Body Text
1
[desc]
800840546
5
746758596
129
0
0
0
0
0
0
[docopts]
5
2
[GramStyle]
[lang]
2
[fopts]
0
1
0
0
Continued on next page...
Continued from previous page...
[tag]
Footer
1
[fnt]
Times New Roman
240
0
49152
[algn]
1
1
0
0
0
[spc]
33
0
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
0
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
24
1
2
.
,
$
Footer
0
0
[tag]
Header
1
[fnt]
Times New Roman
240
0
49152
[algn]
1
1
0
0
0
[spc]
33
0
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
0
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
24
1
2
.
,
$
Header
0
0
[tag]
Title
1
[fnt]
Helvetica
360
0
49153
[algn]
4
1
0
0
0
[spc]
33
0
1
144
72
1
100
[brk]
16
[line]
8
0
1
0
0
1
1
10
10
1
[spec]
0
1
0
1
1
0
0
0
0
[nfmt]
16
1
2
.
,
$
Title
0
0
[tag]
Subhead
1
[fnt]
Times New Roman
240
0
49155
[algn]
1
1
0
0
0
[spc]
33
0
1
72
72
1
100
[brk]
4
[line]
8
0
1
0
0
1
1
10
10
1
[spec]
0
2
0
1
1
0
0
0
0
[nfmt]
16
1
2
.
,
$
Subhead
0
0
[tag]
Number List
1
[fnt]
Times New Roman
240
0
49152
[algn]
1
1
360
360
360
[spc]
33
0
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
0
1
1
10
10
1
[spec]
0
0
<*:>.
0
1
1
0
0
0
0
[nfmt]
16
1
2
.
,
$
Number List
0
0
[tag]
Bullet 1
1
[fnt]
Times New Roman
240
0
49152
[algn]
1
1
288
288
288
[spc]
33
0
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
0
1
1
10
10
1
[spec]
0
0
<*5>
0
1
1
0
0
0
0
[nfmt]
24
1
2
.
,
$
Bullet 1
0
0
[tag]
Bullet
1
[fnt]
Times New Roman
240
0
49152
[algn]
1
1
0
288
288
[spc]
33
0
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
0
1
1
10
10
1
[spec]
0
0
<*0>
0
1
1
0
0
0
0
[nfmt]
16
1
2
.
,
$
Bullet
0
0
[tag]
Body Single
1
[fnt]
Times New Roman
240
0
49152
[algn]
1
1
0
0
0
[spc]
33
0
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
0
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
24
1
2
.
,
$
Body Single
0
0
[tag]
Body Text
1
[fnt]
Times New Roman
240
0
49152
[algn]
1
1
0
0
0
[spc]
33
0
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
0
1
1
144
144
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Text
0
0
[lay]
Standard
513
[rght]
15840
12240
1
720
1440
1
1440
720
0
1
0
1
0
1
1
720
11520
12
1
720
1
1440
1
2160
1
2880
1
3600
1
4320
1
5040
1
5760
1
6480
1
7200
1
7920
1
8640
[frght]
[lyfrm]
1
13184
0
14400
12240
15840
0
1
3
1 0 0 0 0 0 0
0
16777215
0
[frmlay]
15840
12240
1
1440
792
1
14472
1440
0
1
0
0
0
0
1
1440
10800
2
2
4680
3
9360
[txt]
>
[hrght]
[lyfrm]
1
11136
0
0
12240
1440
0
1
3
1 0 0 0 0 0 0
0
16777215
0
[frmlay]
1440
12240
1
1440
72
1
792
1440
0
1
0
0
0
0
1
1440
10800
1
3
9360
[txt]
>
[elay]
[lay]
1
513
[rght]
15840
12240
1
720
1440
1
1440
720
0
1
0
1
0
1
1
720
11520
12
1
720
1
1440
1
2160
1
2880
1
3600
1
4320
1
5040
1
5760
1
6480
1
7200
1
7920
1
8640
[frght]
[lyfrm]
1
13184
0
14400
12240
15840
0
1
3
1 0 0 0 0 0 0
0
16777215
0
[frmlay]
15840
12240
1
1440
792
1
14472
1440
0
1
0
0
0
0
1
1440
10800
2
2
4680
3
9360
[txt]
>
[hrght]
[lyfrm]
1
11136
0
0
12240
1440
0
1
3
1 0 0 0 0 0 0
0
16777215
0
[frmlay]
1440
12240
1
1440
72
1
792
1440
0
1
0
0
0
0
1
1440
10800
1
3
9360
[txt]
>
[elay]
[l1]
1
[edoc]
FUNCTION MainDialog()
IgnoreKeyboard(2) '/* Turn off keyboard interruptions */
returnvalue = 0
SetDlgCallback(8000, "WatchBox")
SetDlgCallback(24, "WatchBox")
SetDlgCallback(20, "WatchBox")
FillEdit(24, TRUE)
<:ZDDE_BookMark1> dlgretval = dialogBox("","lwpdbasw.dlg")<:Z~DDE_BookMark1>
if (dlgretval = -1) '/* Major problem */
password = -1
else
if (dlgretval = 1) '/* Success*/
entirefile = GetDialogField$(24)
selectedfields = GetDialogField$(20)
if (entirefile = TRUE)
.UserInterface.MacroObj.NamedSetProperty("button","entire")
returnvalue = 1
else
if (selectedfields = TRUE)
.UserInterface.MacroObj.NamedSetProperty("button","selected")
fields = GetDialogField$(8000)
.UserInterface.MacroObj.NamedSetProperty("fields",fields)
returnvalue = 1
else '/* Paranoia */
returnvalue = 0
endif
endif
else '/*Canceled*/
returnvalue = 0
endif
endif
</Q>IgnoreKeyboard(0) ' Put keyboard back!
return returnvalue
END FUNCTION
<:p<* >>
FUNCTION WatchBox(hdlg, id, text)
IgnoreKeyboard(2) '/* Turn off keyboard interruptions */
SWITCH id
CASE (24)
if (1 = text)
DlgClearControl(hdlg, 8000)
DlgEnableControl(hdlg, 1, TRUE)
endif
CASE (20)
if (1 = text)
DlgEnableControl(hdlg, 1, FALSE)
endif
CASE (8000)
SetDlgItemText(hdlg, 20,TRUE)
SetDlgItemText(hdlg, 24,FALSE)
DlgEnableControl(hdlg, 1, TRUE)
ENDSWITCH
</Q>IgnoreKeyboard(0) ' Put keyboard back!
END FUNCTION
>
[Embedded]
00007368
>
[macsum4] 2 20
MainDialog 0 0 7 0
WatchBox 819 3 1 36
[macse]
14 MainDialog
29 0 MainDialog
17 1
0 32 2
17 2
29 1 returnvalue
5 0
8 1
17 3
0 41 8000 "WatchBox"
17 4
0 41 24 "WatchBox"
17 5
0 41 20 "WatchBox"
17 6
0 31 24 1
17 7
29 2 dlgretval
0 26 "" "lwpdbasw.dlg"
13
8 2
17 8
6 2
5 -1
18 0
11 00000313
17 9
29 3 password
5 -1
8 3
10 00000781
17 11
6 2
5 1
18 0
11 00000764
17 12
29 4 entirefile
0 27 24
13
8 4
17 13
29 5 selectedfields
0 27 20
13
8 5
17 14
6 4
5 1
18 0
11 00000545
17 15
32 2 101 57 96 "button" "entire"
17 16
5 1
8 1
10 00000751
17 18
6 5
5 1
18 0
11 00000734
17 19
32 2 101 57 96 "button" "selected"
17 20
29 6 fields
0 27 8000
13
8 6
17 21
32 2 101 57 96 "fields" "{6}"
17 22
5 1
8 1
10 00000751
17 24
5 0
8 1
10 00000781
17 28
5 0
8 1
17 32
6 1
15
9
6 0
15
17 33
9
14 WatchBox
29 0 hdlg
29 1 id
29 2 text
29 3 WatchBox
17 1
0 32 2
17 2
5 24
6 1
18 0
11 00000202
17 4
5 1
6 2
18 0
11 00000189
17 5
0 54 "{0}" 8000
17 6
0 53 "{0}" 1 1
10 00000406
5 20
6 1
18 0
11 00000303
17 9
5 1
6 2
18 0
11 00000290
17 10
0 53 "{0}" 1 0
10 00000406
5 8000
6 1
18 0
11 00000406
17 13
0 43 "{0}" 20 1
17 14
0 43 "{0}" 24 0
17 15
0 53 "{0}" 1 1
6 3
15
17 18
9
00007393
